home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 A / CHIP_HITWARE6_A.iso / internet / LorenzHTMLTool / _SETUP.1 / Background Changer.scp < prev    next >
Encoding:
Text File  |  1998-04-12  |  2.3 KB  |  97 lines
  1. <HTMLtool>Changes the color of the page background upon load</HTMLtool>
  2.  
  3. <!-- Background Changer
  4. Please make sure you add your Title before this script.
  5. If you change the last line in will give you the rest of the information for your page (link color, text etc.)
  6. -->
  7.  
  8.  
  9. <SCRIPT>
  10.  
  11. function initArray() 
  12. {
  13.   this.length = initArray.arguments.length
  14.   for (var i = 0; i < this.length; i++)
  15.     this[i+1] = initArray.arguments[i]
  16. }
  17.  
  18. var hexChars = "0123456789ABCDEF";
  19.  
  20. function Dec2Hex (Dec) 
  21. {
  22.   var a = Dec % 16;
  23.   var b = (Dec - a)/16;
  24.   hex = "" + hexChars.charAt(b) + hexChars.charAt(a);
  25.   return hex;
  26. }
  27.  
  28. function bgChanger (begin, end, steps) 
  29. {
  30.   steps = steps -1 ;
  31.  
  32.   redA     = begin.charAt(0) + begin.charAt(1);
  33.   red_valA = parseInt(redA,'16');
  34.   redB     = end.charAt(0) + end.charAt(1);
  35.   red_valB = parseInt(redB,'16');
  36.   red_int  = ((red_valB - red_valA) / steps) * -1;
  37.   grnA     = begin.charAt(2) + begin.charAt(3);
  38.   grn_valA = parseInt(grnA,'16');
  39.   grnB     = end.charAt(2) + end.charAt(3);
  40.   grn_valB = parseInt(grnB,'16');
  41.   grn_int  = ((grn_valB - grn_valA) / steps) * -1;
  42.   bluA     = begin.charAt(4) + begin.charAt(5);
  43.   blu_valA = parseInt(bluA,'16');
  44.   bluB     = end.charAt(4) + end.charAt(5);
  45.   blu_valB = parseInt(bluB,'16');
  46.   blu_int  = ((blu_valB - blu_valA) / steps) * -1;
  47.  
  48.   step = 2;
  49.   red = red_valA;
  50.   grn = grn_valA;
  51.   blu = blu_valA;
  52.  
  53.   document.bgColor = begin;
  54.  
  55.   while ( steps >= step ) 
  56.   {
  57.     red -= red_int;
  58.     red_round = Math.round(red);
  59.     red_hex = Dec2Hex(red);
  60.  
  61.     grn -= grn_int;
  62.     grn_round = Math.round(grn);
  63.     grn_hex = Dec2Hex(grn);
  64.  
  65.     blu -= blu_int;
  66.     blu_round = Math.round(blu);
  67.     blu_hex = Dec2Hex(blu);
  68.  
  69.     document.bgColor = red_hex + grn_hex + blu_hex;
  70.  
  71.     step++;
  72.   }
  73.   document.bgColor = end;
  74. }
  75.  
  76. </SCRIPT>
  77. </HEAD>
  78. <BODY BGCOLOR=#000000 TEXT=#FFFFFF LINK="FF0000" VLINK="8888FF" ALINK="FF00FF">
  79. <SCRIPT>
  80. <!-- 
  81. // black to black (pause)
  82.   bgChanger("000000","000000",25);
  83. // black to red
  84.   bgChanger("000000","FF0000",25);
  85. // red to black
  86.   bgChanger("FF0000","000000",25);
  87. // black to blue
  88.   bgChanger("000000","0000FF",25);
  89. // blue to black
  90.   bgChanger("0000FF","000000",25);
  91. // -->
  92. </SCRIPT>
  93. </HEAD>
  94. <BODY>
  95. <BODY BGCOLOR=000000 TEXT="#ffffff" LINK="#0000ff" VLINK="#c00c0">
  96.  
  97. Place the rest of your page here !